{  Statement: http://acmp.ru/?main=task&id_task=550
   Verdict: Accepted
}
uses
    SysUtils, Math;

var
    n:longint;

function make(n:longint):string;
begin
result := inttostr(n);
while length(result) < 4 do result := '0' + result;
end;

begin
reset(input,'input.txt');
rewrite(output,'output.txt');
read(n);
if (n mod 400 = 0) or ((n mod 4 = 0) and (n mod 100 <> 0)) then write('12/09/', make(n)) else
    write('13/09/', make(n));
end.
